home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Panorama / Panorama - Disk 19D (1987-07-22)(Pacific North-West Amigas Club)[WB].zip / Panorama - Disk 19D (1987-07-22)(Pacific North-West Amigas Club)[WB].adf / PopCLI3 / popsup.a < prev   
Text File  |  1987-06-25  |  723b  |  25 lines
  1. *************************************************************************
  2. *   HandlerInterface()
  3. *
  4. *   This code is needed to convert the calling sequence performed by
  5. *   the input.task for the input stream management into something
  6. *   that a C program can understand.
  7. *
  8. *   This routine expects a pointer to an InputEvent in A0, a pointer
  9. *   to a data area in A1.  These values are transferred to the stack
  10. *   in the order that a C program would need to find them.  Since the
  11. *   actual handler is written in C, this works out fine. 
  12. *
  13. *   Author: Rob Peck, 12/1/85
  14. *
  15.     xdef    _HandlerInterface
  16.     xref    _myhandler
  17.         section "text",code
  18. _HandlerInterface:
  19.     movem.L    A0/A1,-(A7)
  20.     jsr    _myhandler
  21.     addq.L    #8,A7
  22.     rts
  23.  
  24.     END
  25.